ACTION: 3;IFOBJ 21;IFOBJ2 SOBJ1;IFOF 1=0;SAY I say - using the feather to\clean the flute worked splendidly!;OBJ1 SOBJ1;SETOF 1=1;EXIT
ACTION: 3;IFOBJ 21;IFOBJ2 SOBJ1;IFOF 1=1;SAY It's already as clean as can be.;EXIT
ACTION: 3;IFOBJ 24;IFOBJ2 SOBJ3;SAY What? You mean you want me to\stir the mead with the knife??\I'm shaken!;EXIT
ACTION: 3;IFOBJ 24;IFOBJ2 SOBJ1;SAY It is not small enough\- I can't get the blade\into the opening.;EXIT
ACTION: 3;IFOBJ 27;VERB 4;REDO
ACTION: 3;IFOBJ 30;IFOBJ2 SOBJ1;CBOB SBOB5;W 50;SAY How convenient - the strange text on the\flute is explained in this book!;SAY Hmm...;SAY Apparently, the text on the flute reads:\"Play all notes twice to change the weather.";CBOB 11
ACTION: 3;IFOBJ SOBJ1;IFOF 1=0;OMOVE 0, , ,1, , ,A 0,(SBOB1,12)(SBOB2,24)(SBOB1,24)(SBOB2,12);W 150;CBOB 11;SAY I can't get a tone.\It seems something inside\is clogging the flute.;SAY Perhaps I'd better get\something to clean it out with.;EXIT
ACTION: 3;IFOBJ SOBJ1;IFOF 3=1;SAY I think it has served its purpose.\I am not that good a musician.;EXIT
/*
/* Action 4 - Open
/* ===============
/*
ACTION: 4;IFOBJ 27;IFOF 1=0;SAY There's a book inside!;ICON 43;NAME guide book;GET 28,N;GET SOBJ4,U;SAY I'll keep the wrapping paper\and the strange, elastic string\that was around the parcel, too.;SETOF 1=1;EXIT
ACTION: 4;IFOBJ 27;IFOF 2=0;THINK This book seems to contain a\lot of useful tips.;THINK Let's see...;THINK Ah, here:;SETOF 2=1
ACTION: 4;IFOBJ 27;THINK "CONSTANTINOPLE. If you are stranded in\Constantinople, get out as quickly as\possible. It is a boring place."
ACTION: 4;IFOBJ 27;THINK "Sea transportation in Constantinople is scarce\and generally unreliable. Your best bet\is to find a tough, reliable camel of some\sort, and then travel East towards Gurgan,\where better transportation may be found."
ACTION: 4;IFOBJ 27;IFRF 2,4=0;SETRF 2,4=1
ACTION: 4;IFOBJ 27;CBOB 11;EXIT
/*
/* Action 8 - Look at
/* ==================
/*
ACTION: 8;IFOBJ SOBJ1;SAY There are some carvings that look like\text in a foreign language along the\side of the flute.;SETRF 4,3=1;EXIT
ACTION: 8;IFOBJ SOBJ2;SAY I can't buy much with this,\that's for sure.;EXIT
ACTION: 8;IFOBJ SOBJ3;SAY It contains mead of an\appallingly bad quality!;EXIT
ACTION: 8;IFOBJ SOBJ4;SAY It is a thin, elastic string\made of some material that\is unknown to me.;EXIT
ACTION: 8;IFOBJ SOBJ5;SAY This should make it\possible to get out\of here in some\way or other!;EXIT